﻿Namespace BE

    Public Class Usuario_BE

        'Enum TipoAuto
        '    sedan
        '    coupe
        '    cabriolet
        '    familiar
        'End Enum

        Private mid As Integer
        Private mididioma As Integer
        Private mnombre As String
        Private mapellido As String
        Private mnick As String
        Private mpassword As String
        Private mintentosfallidos As Integer
        Private mbloqueado As Boolean
        'Private midfamilia As Integer
        'Private midpatente As Integer

        Public Property id As Integer
            Get
                Return mid
            End Get
            Set(ByVal value As Integer)
                mid = value
            End Set
        End Property

        Public Property ididioma As Integer
            Get
                Return mididioma
            End Get
            Set(ByVal value As Integer)
                mididioma = value
            End Set
        End Property

        Public Property nombre As String
            Get
                Return mnombre
            End Get
            Set(ByVal value As String)
                mnombre = value
            End Set
        End Property

        Public Property apellido As String
            Get
                Return mapellido
            End Get
            Set(ByVal value As String)
                mapellido = value
            End Set
        End Property

        Public Property nick As String
            Get
                Return mnick
            End Get
            Set(ByVal value As String)
                mnick = value
            End Set
        End Property

        Public Property pasword As String
            Get
                Return mpassword
            End Get
            Set(ByVal value As String)
                mpassword = value
            End Set
        End Property

        Public Property intentosfallidos As Integer
            Get
                Return mintentosfallidos
            End Get
            Set(ByVal value As Integer)
                mintentosfallidos = value
            End Set
        End Property

        Public Property bloqueado As Boolean
            Get
                Return mbloqueado
            End Get
            Set(ByVal value As Boolean)
                mbloqueado = value
            End Set
        End Property

        'Public Property idfamilia As Integer
        '    Get
        '        Return midfamilia
        '    End Get
        '    Set(ByVal value As Integer)
        '        midfamilia = value
        '    End Set
        'End Property

        'Public Property idpatente As Integer
        '    Get
        '        Return midpatente
        '    End Get
        '    Set(ByVal value As Integer)
        '        midpatente = value
        '    End Set
        'End Property

    End Class

End Namespace

